Imports System
Module qs

    Sub Main()
        Console.WriteLine(Asc("a"))
        Console.WriteLine(Chr(65))
        Console.ReadKey()
    End Sub 

End Module
